home *** CD-ROM | disk | FTP | other *** search
/ Deutsche Edition 1 / Deutsche Edition 1.iso / amok / amok_lha / amok58.lha / NPrint / txt / StringConv.def < prev    next >
Text File  |  1993-08-15  |  1KB  |  40 lines
  1. (**********************************************************************
  2.  
  3.     :Program.    StringConv.def
  4.     :Contents.   string formatting procedures
  5.     :Author.     Nicolas Benezan [bne]
  6.     :Address.    Postwiesenstr. 2, D7000 Stuttgart 60
  7.     :Phone.      711/333679
  8.     :Copyright.  Public Domain
  9.     :Language.   Modula-2
  10.     :Translator. M2Amiga A+L V3.2d
  11.     :History.    V1.0a [bne] 11.May.1989
  12.  
  13. **********************************************************************)
  14.  
  15. DEFINITION MODULE StringConv;
  16.  
  17. PROCEDURE ConversionOk():BOOLEAN;
  18. (*:Result.      FALSE if there's been an error since the last call
  19.   :Result.      to ConversionOk().
  20. *)
  21.  
  22. PROCEDURE IntToStr(    Int:LONGINT;
  23.                    VAR String:ARRAY OF CHAR);
  24. (*:Semantic.    Converts an INTEGER, CARDINAL or LONGINT variable into
  25.   :Semantic.    a String (decimal).
  26. *)
  27.  
  28. PROCEDURE IntToHex(    Int:LONGINT;
  29.                    VAR String:ARRAY OF CHAR);
  30. (*:Semantic.    Converts an INTEGER, CARDINAL or LONGINT variable into
  31.   :Semantic.    a String (hexadecimal).
  32. *)
  33.  
  34. PROCEDURE StrToInt(String:ARRAY OF CHAR):LONGINT;
  35. (*:Semantic.    Converts a String into a LONGINT value
  36. *)
  37.  
  38. END StringConv.
  39.  
  40.